home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / ISSUE01 / TIPTRIX / LISTNG10.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1995-06-01  |  210 b   |  12 lines
  1. type
  2.   cResBitmap = class(TBitmap)
  3.   public
  4.     constructor Create(aId:PChar);
  5.   end;
  6.  
  7. constructor cResBitmap.Create(aId: PChar);
  8. begin
  9.   inherited Create;
  10.   Handle:= LoadBitmap(hInstance,aId);
  11. end;
  12.